function exportToHTML(main, mainTWO)

%% Filtro. Diagrama de Bode
mainTWO.finalFilter.transferFunction
figure();
bode(mainTWO.finalFilter.transferFunction);
grid;

%% Etapas del filtro
for index = 1 : main.assignedAmount
    disp(' ');
    disp(['Etapa' num2str(main.assignedStageTracking{index,1})]);
    disp('-------------------------------------------------------------------------');
   stageToGet = ['stage' num2str(main.assignedStageTracking{index,1})];
   f1 = figure();
   ax=gca(gcf);
   stageType = obtainStageType (main.(stageToGet).stagePoles, main.(stageToGet).stageZeros);
   
   if stageType == 1
       if main.(stageToGet).stageCircuit == 4
           imshow(main.imageRauchBP,'Parent',ax);
       elseif main.(stageToGet).stageCircuit == 3
           imshow(main.imageUniversal,'Parent',ax);
       end
   elseif stageType == 2
       if main.(stageToGet).stageCircuit == 1
           imshow(main.imageSallenKeyLP,'Parent',ax);
       elseif main.(stageToGet).stageCircuit ==2
           imshow(main.imageSedraLP,'Parent',ax);
       elseif main.(stageToGet).stageCircuit == 3
           imshow(main.imageUniversal,'Parent',ax);
       elseif main.(stageToGet).stageCircuit == 5
           imshow(main.imageInt,'Parent',ax);
       end
   elseif stageType == 3
       if main.(stageToGet).stageCircuit == 1
           imshow(main.imageSallenKeyHP,'Parent',ax);
       elseif main.(stageToGet).stageCircuit == 2
           imshow(main.imageSedraHP,'Parent',ax);
       elseif main.(stageToGet).stageCircuit == 3
           imshow(main.imageUniversal,'Parent',ax);
       elseif main.(stageToGet).stageCircuit == 6
           imshow(main.imageDer,'Parent',ax);
       end
   elseif stageType == 4
       if main.(stageToGet).stageCircuit == 4
           imshow(main.imageRauchBR,'Parent',ax);
       elseif main.(stageToGet).stageCircuit == 3
           imshow(main.imageUniversal,'Parent',ax);
       end
   end
       
   
   snapnow;
   close(f1);
   % Diagrama de Bode
   disp(['Etapa' num2str(main.assignedStageTracking{index,1})]);
   disp(' ');
   disp('Componentes:');
   disp(' ');
   
   componentsize = size(main.(stageToGet).componentTracking);
   
   for j=1: componentsize(1);
       if main.(stageToGet).componentTracking{j,2} ~= Inf
           disp([main.(stageToGet).componentTracking{j,1} '= ' num2str(main.(stageToGet).componentTracking{j,2})]);
       end
   end
   
   disp(' ');
   disp('Funcion Transferencia:');
   main.(stageToGet).stageTransferFunction
   %figure();
   bode(main.(stageToGet).stageTransferFunction);
   grid;
   title(['Etapa' num2str(main.assignedStageTracking{index,1})]);
   snapnow
   
   
 
end




end